home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1986 February / Ahoy_Magazine_86-02_1986_Double_L.d64 / character dump (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  2KB  |  44 lines
  1. 1 rem ******************************
  2. 2 rem **                          **
  3. 3 rem **     character dump       **
  4. 4 rem **     by jim sanders       **
  5. 5 rem **   for ahoy! magazine     **
  6. 6 rem **                          **
  7. 7 rem ******************************
  8. 8 poke 53280,12:poke53281,12:print""
  9. 10 rem*data loader for dump 52992
  10. 20 print"[147]":cs=0
  11. 30 for i=52992 to 53140:read a:poke i,a
  12. 40 cs=cs+a:nexti
  13. 45 printcs
  14. 50 ifcs<>18597 then print"****error in data statements****":end
  15. 55 print"to activate f7 key sys 52992"
  16. 60 print"to change to f1 poke 53024,4"
  17. 65 print"to change to f3 poke 53024,5"
  18. 70 print"to change to f5 poke 53024,6"
  19. 75 print"to change to f7 poke 53024,3"
  20. 80 print"type 'new' <return> after poke"
  21. 85 print"hit run/stop to disable"
  22. 90 print"sys 52992 then press f7":print"to print these instructions"
  23. 95 print"character dump may be activated from":print"program by line entry:sys 53034"
  24. 100 new
  25. 52992 data120,173,20,3,141,169,2,173
  26. 53000 data21,3,141,170,2,169,29,141
  27. 53008 data20,3,169,207,141,21,3,169
  28. 53016 data0,133,254,88,96,165,197,201
  29. 53024 data3,208,4,165,254,240,3,108
  30. 53032 data169,2,169,255,133,254,169,4
  31. 53040 data133,186,169,126,133,184,169,0
  32. 53048 data160,4,133,113,132,114,133,183
  33. 53056 data133,185,32,192,255,166,184,32
  34. 53064 data201,255,162,25,169,13,32,210
  35. 53072 data255,32,225,255,240,46,160,0
  36. 53080 data177,113,133,103,41,63,6,103
  37. 53088 data36,103,16,2,9,128,112,2
  38. 53096 data9,64,32,210,255,200,192,40
  39. 53104 data208,230,152,24,101,113,133,113
  40. 53112 data144,2,230,114,202,208,205,169
  41. 53120 data13,32,210,255,32,204,255,169
  42. 53128 data8,32,195,255,169,0,133,254
  43. 53136 data76,188,254,96,255
  44.